home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d18
/
tjockdem.arc
/
DEMO5.ARC
/
READDEM4.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1989-02-03
|
264b
|
13 lines
Program ReadTTT5_Demo_4;
{used in manual figure 12.1}
Uses Crt,ReadTTT5;
var Choice : byte;
begin
Clrscr;
Read_Select(10,5,'How Good is The Toolkit? ',
'^Bloody_Awful Fair Good The_Best',
Choice);
end.